SQLDIRECT "DISCONNECT SESSION 2"
SCREXEC "SQLCLEAR.VBS"
SETVAL "SQLSTATE=DB_DISCONNECT"
